# alpha.bags : function (bp, alpha = 0.95, which = NULL, col = ez.col, lty = 1, lwd = 1, max = 2500)
# axes : function (bp, X.names = colnames(bp$X), which = 1:bp$p, col = grey(0.7), lwd = 1, lty = 1, label.dir = "Orthog",
# label.col = col, label.cex = 0.75, label.dist = 0, ticks = 5, tick.col = col, tick.size = 1, tick.label = T,
# tick.label.col = tick.col, tick.label.cex = 0.6, tick.label.side = "left", tick.label.offset = 0.5, tick.label.pos = 1,
# predict.col = col, predict.lwd = lwd, predict.lty = lty, ax.names = X.names, orthogx = 0, orthogy = 0)
# biplot : function (data, group.aes = NULL, center = TRUE, scaled = FALSE, Title = NULL)
# concentration.ellipse : function (bp, df = 2, kappa = NULL, which = NULL, alpha = 0.95, col = ez.col, lty = 1, lwd = 1, alpha.transparency = 0.5)
# legend.type : function (bp, samples = F, means = F, bags = F, new = FALSE, ...)
# PCA : function (bp, dim.biplot = c(2, 1, 3), e.vects = 1:ncol(bp$X), group.aes = NULL, correlation.biplot = FALSE, ...)
# samples : function (bp, col = ez.col, pch = 3, cex = 1, label = F, label.cex = 0.75, label.side = "bottom", connected = F,
# alpha = 1)